home *** CD-ROM | disk | FTP | other *** search
/ Aminet 5 / Aminet 5 - March 1995.iso / Aminet / util / cdity / ntrash21.lha / newtrashcan / install / install_2.1+ / deutsch next >
Text File  |  1993-08-15  |  1KB  |  39 lines
  1. ; NewTrashcan Installer
  2.  
  3. (set handdir
  4.      (askdir (prompt "Verzeichnis für den Handler wählen")
  5.              (default "sys:WBStartup")
  6.              (help @askdir-help)))
  7.  
  8. (copyfiles (source "//WBStartup/")
  9.            (dest handdir)
  10.            (pattern "#?")
  11.            (infos))
  12.  
  13. (set dirname
  14.      (askdir (prompt "Verzeichnis für den Voreinsteller wählen")
  15.              (default "sys:Prefs")
  16.              (help @askdir-help)))
  17.  
  18. (copyfiles (source "//Prefs/")
  19.            (dest dirname)
  20.            (pattern "#?")
  21.            (infos))
  22. (set locale
  23.      (getassign "Locale" "a"))
  24.  
  25. (if locale
  26. (    (set sloc (cat "//Locale/" @language "/"))
  27.      (set dloc (cat "Locale:catalogs/" @language "/"))
  28.      (copyfiles (source sloc)
  29.                 (dest dloc)
  30.                 (pattern "#?"))))
  31.  
  32. (if (askbool (help @askbool-help)
  33.              (prompt "Soll der Handler jetzt gestartet werden?")
  34.              (choices "JA" "NEIN"))
  35. ((set nt (cat "run " handdir "/NewTrashcan install"))
  36.  (run nt))
  37. )
  38.  
  39. (exit "Fertig!\n" "NewTrashcan wird beim nächsten Booten immer gestartet.")